/ MacHack 1994 / MacHack 1994.toast / MacHack™ 1987-1994 / MacHack™ '90 / Source Code ƒ.sea / Source Code ƒ / MPW C ƒ / C Include ƒ / Source Files / CIncludesCode.h

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0f 43 49 6e 63 6c 75 | 64 65 73 43 6f 64 65 2e |..CInclu|desCode.|
|00000010| 68 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |h.......|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 00 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 01 fb 00 | 00 01 7e a2 39 b5 ac a2 |........|..~.9...|
|00000060| 39 b5 ac 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |9.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 93 01 00 00 |........|........|
|00000080| 72 53 74 61 74 75 73 09 | 50 72 53 74 61 74 75 73 |rStatus.|PrStatus|
|00000090| 3b 0d 09 47 72 61 66 50 | 74 72 09 09 6f 6c 64 50 |;..GrafP|tr..oldP|
|000000a0| 6f 72 74 3b 20 20 0d 09 | 42 6f 6f 6c 65 61 6e 20 |ort;  ..|Boolean |
|000000b0| 09 6e 6f 74 43 61 6e 63 | 65 6c 6c 65 64 20 3d 20 |.notCanc|elled = |
|000000c0| 74 72 75 65 3b 0d 09 42 | 6f 6f 6c 65 61 6e 09 09 |true;..B|oolean..|
|000000d0| 64 72 6f 70 3b 0d 0d 09 | 47 65 74 50 6f 72 74 20 |drop;...|GetPort |
|000000e0| 28 26 6f 6c 64 50 6f 72 | 74 29 3b 0d 09 50 72 4f |(&oldPor|t);..PrO|
|000000f0| 70 65 6e 28 29 3b 0d 0d | 20 20 20 20 53 65 74 46 |pen();..|    SetF|
|00000100| 72 61 63 74 45 6e 61 62 | 6c 65 28 74 72 75 65 29 |ractEnab|le(true)|
|00000110| 3b 0d 20 20 20 20 53 65 | 74 46 53 63 61 6c 65 44 |;.    Se|tFScaleD|
|00000120| 69 73 61 62 6c 65 28 74 | 72 75 65 29 3b 0d 0d 09 |isable(t|rue);...|
|00000130| 68 50 72 69 6e 74 20 3d | 20 28 54 48 50 72 69 6e |hPrint =| (THPrin|
|00000140| 74 29 20 4e 65 77 48 61 | 6e 64 6c 65 28 73 69 7a |t) NewHa|ndle(siz|
|00000150| 65 6f 66 28 54 50 72 69 | 6e 74 29 29 3b 0d 09 69 |eof(TPri|nt));..i|
|00000160| 66 20 28 52 65 73 45 72 | 72 6f 72 28 29 29 0d 09 |f (ResEr|ror())..|
|00000170| 7b 0d 09 09 70 72 69 6e | 74 66 20 28 22 50 72 69 |{...prin|tf ("Pri|
|00000180| 6e 74 69 6e 67 20 45 72 | 72 6f 72 20 25 64 5c 6e |nting Er|ror %d\n|
|00000190| 22 2c 20 52 65 73 45 72 | 72 6f 72 28 29 29 3b 0d |", ResEr|ror());.|
|000001a0| 09 09 53 79 73 42 65 65 | 70 28 31 29 3b 0d 09 09 |..SysBee|p(1);...|
|000001b0| 50 72 43 6c 6f 73 65 28 | 29 3b 0d 09 09 72 65 74 |PrClose(|);...ret|
|000001c0| 75 72 6e 3b 0d 09 7d 0d | 09 0d 09 64 72 6f 70 20 |urn;..}.|...drop |
|000001d0| 3d 20 50 72 56 61 6c 69 | 64 61 74 65 28 68 50 72 |= PrVali|date(hPr|
|000001e0| 69 6e 74 29 3b 0d 09 6e | 6f 74 43 61 6e 63 65 6c |int);..n|otCancel|
|000001f0| 6c 65 64 20 3d 20 50 72 | 4a 6f 62 44 69 61 6c 6f |led = Pr|JobDialo|
|00000200| 67 20 28 68 50 72 69 6e | 74 29 3b 0d 09 09 0d 09 |g (hPrin|t);.....|
|00000210| 69 66 20 28 6e 6f 74 43 | 61 6e 63 65 6c 6c 65 64 |if (notC|ancelled|
|00000220| 29 0d 09 7b 0d 09 09 70 | 70 6f 72 74 20 3d 20 50 |)..{...p|port = P|
|00000230| 72 4f 70 65 6e 44 6f 63 | 28 68 50 72 69 6e 74 2c |rOpenDoc|(hPrint,|
|00000240| 20 6e 69 6c 2c 20 6e 69 | 6c 29 3b 0d 09 09 69 66 | nil, ni|l);...if|
|00000250| 20 28 20 50 72 45 72 72 | 6f 72 28 29 20 3d 3d 20 | ( PrErr|or() == |
|00000260| 6e 6f 45 72 72 20 29 0d | 09 09 7b 0d 09 09 09 50 |noErr ).|..{....P|
|00000270| 72 4f 70 65 6e 50 61 67 | 65 28 70 00 00 00 00 00 |rOpenPag|e(p.....|
|00000280| 6e 2e 72 6f 77 42 79 74 | 65 73 20 3d 20 6f 66 66 |n.rowByt|es = off|
|00000290| 52 6f 77 42 79 74 65 73 | 3b 0d 09 53 65 74 52 65 |RowBytes|;..SetRe|
|000002a0| 63 74 28 26 28 6f 66 66 | 53 63 72 65 65 6e 2e 62 |ct(&(off|Screen.b|
|000002b0| 6f 75 6e 64 73 29 2c 20 | 30 2c 20 30 2c 20 77 69 |ounds), |0, 0, wi|
|000002c0| 6e 64 6f 77 57 69 64 74 | 68 2c 20 77 69 6e 64 6f |ndowWidt|h, windo|
|000002d0| 77 48 65 69 67 68 74 29 | 3b 0d 7d 0d 0d 0d 76 6f |wHeight)|;.}...vo|
|000002e0| 69 64 20 6d 61 6b 65 57 | 69 6e 64 6f 77 28 29 0d |id makeW|indow().|
|000002f0| 7b 0d 09 52 65 63 74 09 | 62 6f 75 6e 64 73 3b 0d |{..Rect.|bounds;.|
|00000300| 0d 09 53 65 74 52 65 63 | 74 28 26 62 6f 75 6e 64 |..SetRec|t(&bound|
|00000310| 73 2c 20 77 69 6e 64 6f | 77 4c 65 66 74 2c 20 77 |s, windo|wLeft, w|
|00000320| 69 6e 64 6f 77 54 6f 70 | 2c 20 77 69 6e 64 6f 77 |indowTop|, window|
|00000330| 4c 65 66 74 20 2b 20 77 | 69 6e 64 6f 77 57 69 64 |Left + w|indowWid|
|00000340| 74 68 2c 20 77 69 6e 64 | 6f 77 54 6f 70 20 2b 20 |th, wind|owTop + |
|00000350| 77 69 6e 64 6f 77 48 65 | 69 67 68 74 29 3b 0d 09 |windowHe|ight);..|
|00000360| 64 69 73 70 6c 61 79 20 | 3d 20 4e 65 77 57 69 6e |display |= NewWin|
|00000370| 64 6f 77 28 6e 69 6c 2c | 20 26 62 6f 75 6e 64 73 |dow(nil,| &bounds|
|00000380| 2c 20 77 69 6e 64 6f 77 | 54 69 74 6c 65 2c 20 74 |, window|Title, t|
|00000390| 72 75 65 2c 20 6e 6f 47 | 72 6f 77 44 6f 63 50 72 |rue, noG|rowDocPr|
|000003a0| 6f 63 2c 20 28 57 69 6e | 64 6f 77 50 74 72 29 20 |oc, (Win|dowPtr) |
|000003b0| 2d 31 2c 20 74 72 75 65 | 2c 20 30 4c 29 3b 0d 7d |-1, true|, 0L);.}|
|000003c0| 0d 0d 0d 76 6f 69 64 20 | 70 72 69 6e 74 57 69 6e |...void |printWin|
|000003d0| 64 6f 77 28 29 0d 7b 0d | 09 54 50 50 72 50 6f 72 |dow().{.|.TPPrPor|
|000003e0| 74 09 70 70 6f 72 74 3b | 0d 09 54 48 50 72 69 6e |t.pport;|..THPrin|
|000003f0| 74 09 09 68 50 72 69 6e | 74 3b 0d 09 54 50 00 00 |t..hPrin|t;..TP..|
+--------+-------------------------+-------------------------+--------+--------+